{$CLEO .cs}
THREAD 'SPK'



REPEAT
WAIT 0
if AND
   00E1:   player 0 pressed_key 17
   8818:   not actor $PLAYER_ACTOR in_air 
JF CONTINUE
WHILE 00E1:   player 0 pressed_key 17
     WAIT 0
     IF 33@ >= 5
     THEN 33@ = 0
         IF NOT 10@ >= 200.0
         THEN 10@ += 1.0
         END
     END
     0092: 11@ = float 10@ to_integer 

     01E5: show_text_1number_highpriority GXT 'NUMBER' number 11@ time 50 flag 1  // ~s~VocY precisa de $~1~ para competir.

END 

0208: 2@ = random_float_in_ranges 1.2 20.2
0208: 3@ = random_float_in_ranges 0.1 0.5 

04C4: store_coords_to 4@ 5@ 6@ from_actor $PLAYER_ACTOR with_offset 0.0 3@ 10@ 
04C4: store_coords_to 7@ 8@ 9@ from_actor $PLAYER_ACTOR with_offset 0.0 0.0 0.0 
0063: 4@ -= 7@ // (float) 
0063: 5@ -= 8@ // (float) 
0063: 6@ -= 9@ // (float) 
4@ *= 40.0 
5@ *= 40.0 
Actor.StorePos($PLAYER_ACTOR, 7@, 8@, 9@)
08C7: put_actor $PLAYER_ACTOR at 7@ 8@ 9@ dont_warp_gang 
083C: set_actor $PLAYER_ACTOR velocity_in_direction_XYZ 4@ 5@ 6@ 
10@ = 0.0
UNTIL FALSE